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0 0201 
Q020 2 

.42 00 0 0 22 . ..~.. 

44000022 

. 50.060022 . 

. 304' . 

301 

... 30 2 . 

_ - VFO 

VFD 

vpd 

A 9/CH ^ ? A.15/XIN t.RR 
A9/GH51A15/XINERR 
AQ/HHfi,A1 E/XTNPRP 






o"“ 

0 020 3 

60 30 0 0,22 

30 3 

*2 ft h 

VFD 

A 9/CH7> A15/XINERR 





o 


. A, 

40 1C 0 0 22 

40200022 

40400022 

O y H 
"7 > , u 
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Q .. 

U U4U4 

0 0 265 

0 020 6 

"trtrt?” 

30 6 

30 7 

£ 8 LI 

VFD 

VFO 

- A* u"? «T t>- / a ±■ N't K K 

A9/CH1,A15/XINERR 

A 9/C H2»A15/ XIN ERR 




... * VJ 


..0 020 7 

0 0210 
00211 

4T0'0"0'0"2Z... — 

42 0C 0 0 22 

44000022 

30 3 

309 

.310 

VFO 

VFO 
■ VFD 

..HSr97CTf37AT 57'X I NERR. 

A9/CH4>A15/XINERR 
. A 9/CH5,A15/XINFRR 






O' .. 

00212 

00213 

50000022 

600CCO 22 

311 
- 312 

VFO 

VFD 

A9/GH6,A15/XINERR 
A9/GH7,A15/XINFRR 





o 

10 

O, . j 

0 0214 
00215 

4 010 0 0 22 

40200022 

”8rtr” 

314 

315 

VFD 

VFD 

A 9/CHO,A15/XINERR 
A9/CH1,A15/XINERR 

EQUIPMENT c 




.o 

_ p . 

.a 0216 

00217 
0 022 0 

.44 444422... 

41000022 

42 00 0 622 .-. : .-.. 

.816 

317 

. 3 !.£.... 

.......~...VFD.— 

VFD ■ 
VFO 

~ A97CH2,A15/XINERR.. 

A9/GH3,A15/XINERR 
_A..9/C..H4-,. A15/XI NERR... 






O . 

00221 

00222 
n n o 

44 00 0 0 22 

50 00 0 0 22 

....... ii.n An n Pt OO--- . . . ■ ... , . 

319 

320 

70 t 

VFD 

VFD 

, , wen 

A9/CH5 j A15/XINERR 
A9/GH6,A15/XINERR 





. o 

o 6 _ 

0 0 224 

D U U U U {} £ £ 

40100022 

322 

323 

vrU 

VFD 

sru M / $ Axe?/ a t rl t KK 

A9/CH0 j A15/XINERR 

EQUIPMENT 7 




..:. o 


...0 0225 

0 0226 

0 0 227 

.46 200022. .*.. _ . 

40400022 

. 4104.0.0.2.2 .. ............ 

32 4 .. 

325 
.32 6 

..VFD. 

VFD 

. VFD _ 

fl g/Q RiyaiE/XT'NE R R 

A 9/CH2j A15/XINERR 
.. A 9/C.H3.J.A15 / XINERR . 






o 5 ^ 

00230 

0 0231 

. 0 0232 

0 0233 

42000022 

4400 00 22 

54 0 0 6 4 2-2 ™—————- 
60000022 

32 7’ 

328 

32 9— 
330 

VFD 

VFD 

A9/GH4,A15/XINERR 
A9/CH5,A15/XINERR 





G 

Q 

VFD 

A^/b nb 9 Alt; / X IMtKK 

A9/GH7,A15/XINERR 





L.. . O 
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.— CHANNEL INTERRUPTS -.. ' ..* 

* STARTING AT 100 OCTAL * 

¥¥ ¥ ^ Z X * ¥ ¥ ¥¥¥¥¥¥¥¥¥ ¥ ¥ ¥¥¥ ¥¥¥¥¥ ¥¥¥ ¥ ¥ ¥ ¥¥¥¥¥¥ ¥ ¥¥ ¥ ¥ ¥ ¥¥¥ ¥¥ ¥¥¥¥¥¥¥¥ ¥ ¥ 


00234 
00235 
00236 
00237 
00240 
00241 
0 0 242 
00243 


401G0022 
40200022 
40400022 
*410 0 0 0 22 
42000022 
44000022 

.5 000 0 0 22' 

60000022 


.A 9/C H O > 

A 9/C H1j 
A9/CH2, 
A9/CH3, 
A9/CH4, 
A9/CH5, 

.A9/CH6, 

A9/CH7, 


A15/IGNORE 
A15/IGNCRE 
A15/IGNCRE 
A15/TGNCRE 
A15/IGNCRE 
A15/IGN0RE 
A157IGNORE 
A15/IGNORE 


O ._...._._... 

kJ .V* O 

354 

* 

SPECIAL INTERRUPTS 

¥ 

.__iO 


3 5 3 

¥ 

.STARTING. AT .Tifl.OCTAL . 

¥ 



JifiiAMJjiJiiiMifi 


ilMJMSMIiii **. '* «»»»»*! 


00244 
”0 0245 
00246 
00247 
'¥'0250' 
00251 
0 0252 
00253 
0 0254 


40077777 

00077777 
00077777 
TT0T3 77777" 
00000022 

00 0 77777-. 

00000022 
GO 077777 


CLOKIN 
“ 2 NA-Q 1 f— 
I NOV F 
INFPF 

I'Na'co'.. 

IGNORE 
I1AN-IM-T 
IGNORE 
E XEC 


REAL TIME CLOCK INTERRUPT 
—ARITHMETIC OVERFLOW 
DIVIDE FAULT 
EXPONENT FAULT 

BCD'.FAULT . 

SEARCH/HOVE INTERRUPT 

.MANUAL.INTERRUPT .. 

ASSOCIATED PROCESSOR 
EXECUTIVE INTERRUPT 


o 
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Lyy'W¥¥TY YY'P .; 

Y 

... .•.Y. 





YY Y Y Y Y Y Y Y Y Y Y Y Y YY Y YY 

370 * 

.^ 7 i. . Y. 

Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y 

a 




372 * 

373 * 

ROUTINE TO SAVE STATUS OF 
USES RTEMF1 FOR TEMPORARY 

PROGRAM IN PUSH DOWN LIST 

STORAGE 

Y 

Y 

Q 




.0/4. ■ ^ 

375 * 

Y Y YY YY YY YY YY Y Y Y Y Y YY Y Y YY Y Y YY YYYYY YY Y YY Y Y YYY YYYYYYYYYYYYYYYYYYYYYYYYYYYYYY 

■ Y ..... ' ' ...- ... . ...... 

Y 

YY 


D 025 5 
.0 025 6 -. 

OlOOCOOO 

53630024 


377 

378 REGSA ME 

. 3.7 q. 

UJP 

.TTM. 

IMPURE 

.DT.rM 04 _._v. p_. 

.c A up TN?nFX.?. 


O . 

00257 

0 0260 

5323 0 0 36 
02600263 

P 

380 

381 

THI 

IJD 

L EVEL» X2 
*+3, X2 

u n V L i H uu A CL 


O 

0 0261 
00262 

0 0263 

7 0 70 0 454 
5420 G 0 66 
45200130 

P. 

X 

X 

3 8 2 

383 

384 

S'S R. 

LDI 

Si AG 

B DPCR 

RPSAPTR,X2 

A 5 X2 

SAVE BCR IF INTERUPTFROM USER 

SAVE A AND G. 



.00264. 

0 0265 

... 0 0 266. 

77630000 
44200126 
-.5-3410-0 2-4- 

X 

3 6 5 

386 

.3 87. 

CRA 

SWA 

THO 

CR,X2 

• R TEMPI...-.-. 

SAVE THE CONDITION REGISTER 


O 

0 0267 

0 0270 

n n o~7 a 

5 310 0 000 
45200123 

X 

388 

389 

TIA 

STAQ 

XI 

11, X2 

SAVE INDEX 1 AND INDEX 2 


o. 

0 02/1 

0 0272 

0 0 273 

3 3 30 U U 0 0. 

21000004 

45200117 

X 

■..... 39 a...■........ 

391 

392 

TIA 

LQQ 

STAQ 

A 3 

4 

. 13,X2 

LOAD PC 

SAVE INDEX 3 AND THE PC 



0 0274. 

00275 

. 0 0276. 

?756Q06fJ 

13077774 

.7X.3..0.0.0-0-0. 


...3W.... 

394 

.... 3 . 9.5 ....... 

. CIA.. 

SHAQ 

.gins.-.. 

-3 

.SENSE .-. 

.SAVE.C H A N NE L.I N BEX''RE’GTS T ER~ . 

CIA TO LEFT OF G 


O 

00277 

00 30 0 

12077774 

13000Q03 


396 

39 7 

SHA ~ 

SHAQ 

w 

3 

DROP LOWER THREE BITS OF A 

PACK CIR INTO A 


o .. 

U 0 30 1 

0 0 302 

00 30 3 

40 LG 0 0 /3 
53330036 
02700321 

X 

p 

.89 a ... 

399 

400 

q] A 

THI 

IJO 

I S f X 2 

LEVEL,X3 

STACK,X3 

. SAVE" T HE INTERNAL' ST A 1 US . 

JUMP IF STACKED INTERRUPTS 



...0 0 30 4. 

00305 

... 0.0.30-6.- 

77650001 
44200067 
2-0-2-0-0-2-65. 

X 

_x___ 

. WI . 

40 2 

.40 24-0 01 . 

“PFIT. 

SWA 

4-0-A - 

.FFOTC+PFR . : . 

PF 1 ,X2 

..CR ,X2+PSA..... 

. G-EI.LAST.CO NDIXIG-N-- R EGI S-T> R. 


o 

00307 

0 0 310 

,n n 7 -j j 

17 60 0 010 
03 00 0320 

p 

402+062 

402+003 

ANA 

AZJ,EQ 

000108 

NOLJA 

MASK TO PROGRAM STATE JUMP BIT 
JUMP IF NOT UPDATED 


o........ 

J U J1 i 

00312 

0 0 313 

f f 7011 dUU 

13077750 

77674000 


4 U &> U u 4 

402+005 

402+006 

JmA 

SHAQ 

ISA 

-15 

uL 1 L Ao 1 u b n i A 0 D t\.b S 3 

DOWN INTO G 

GET INSTRUCTION STATE REGISTER 



0 03X4 
00315 

.... 0..0.3.16.- 

’03 00 0 320 
17600001 
13000017. 

F. 

. 40 2 + 0 0”?. 

4 Q 2 + 0 0 8 

. 4.0-2+.Q.0-9....... 

. 

ANA 

..SHA-Q_ 

TCJF.*. 

1 

.15..... 

JUMP IF FROM MONITOR 

MASK TC PROPER BANK 
.ALL IHF WAY BACK UP FDR.STORE. 


O . 

0 0317 

46277777 

00320 

x. 

P 

O 

402+010 

40 2+011 MOL JA 

SC HA 

EQU 

LJA,X2+PSA 
* 

AND SAVE INTO THE PSA FOR USER 


o. 

u u oc y 
00321 
00322 

1 4 <5 U U o 1 -<3 
15300011 
53 73 0 036 

r 

404 STACK 

40 5 

cInx 

INI 

TIM 

1 MTPDL-9 * a 3 

9 , X3 

LEVEL,X3 

ADVANCE THE PIS HD OWN LEVEL 
_SAVE THE.NEW.LEVEL ____ 



.0 0 32 3 . 

01 0 0 0255 ' 

■”p... 

4 6 E 

UUP 

~T?”EGS'A v : E~. 



o ~ 

q 2 i 

_____ 



409 * 

•Y Y YY Y Y YY Y YY Y Y YYYY 

Y YYY YY YYY Y YY.Y YYYY YY YY YY Y YY Y-Y-YY YY YY YY Y Y 

Y 





41 u ■* ' ' 

411 * 

Y YYY YY YY- 

INTERRUPI PUSH DOWN LISi 

YY YY-YYYY YYYY-Y YYY YYYYYYYY YY YY 

- YY YY YY Y YY Y YY Y Y Y YY Y YY Y Y Y Y Y Y Y Y YYYY YY YY 

’ Y .. . 

Y 

Y Y 

0 1_ “ 

0 0 324 

. n a /i £ / , 



413 

414 INI POL 

8 SS 

c 4 s 

8*11 

4 . , , . 

ALLOW 11 STACKED INTERRUPTS 

. Ci,z T- f>/c cnn tLC*nrn 


1 o 

a ■ 

U u 



4 JL ourOK 

tJhb . 

. 1 .” ... ..... . .. 

b I UK A b h ruK . Hit .o u K. - . ” 



(J 
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O 5 

Q, 
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418 

41 q 

. ifTif ^ Jif AF- atft"'AP AF*^ ^ 'AP Jtf 1 " 4 jcr-:^p;--jyt“ 2 sat--jgt''V'^ ^^^'-3^ *. 

. * . ROUTINE TO PROCESS CHANNEL.INTERRUPTS.*. 


CD 

Q . 

00455 

00455 P 

17100007 

420 

..42 2.* 

423 

424 

* * 

************** * * ********* *** * ********* ******************* ***************** 

CHANINT EQU * 

ANI 7,Xl+CHANNEL 

'CD 

. a> 


. 0 0456 

0 0 45 7 

.77 300007... 

01000556 P 

.. 0 0 46 Q.~P.-..-.. 

42 5 

42 6 

.427. 

INS 

UJP 

.C HL ABEL.-ECU. 

7 ^SENSE 

CHERROR 

& 

SKIP IF CHANNEL INTERRUPT 


; o ■■ 

0 0 460 
00461 

14200007 

14700000 

428 

429 

ENI 

RLSCHANX ENQ 

7 ,X2 

0 

SET INDEX TWO NGN-ZERO 

o 

o . 

U u 4 o c 

0 0 463 

0 0^64 

•'14630 001 

12100000 

77730000 

, 43 q - 

431 

432 

_________ 

SNA 

VFD 

0 , Xl + CHANNEL 

A 12/DINT 

SHIFT INTO THE CHANNEL POSITION 

PREVENT INTERFERENCE 

.;.bO 


...0TP»55~ 

00466 
..0 0-46 7- 

44000466 P 

7750 0000 

.15 62 0 0 00 ..-.- 

433 

434 

.. 47,5 . 

SWA 

INC L 

..vn n. 

* +i 

IMPURE 

.9nnan a. 

PUT THE CHANNEL BIT INTO THE WORD 

CLEAR THE CHANNEL INTERRUPT 


O 

00470 

00471 

44000535 P 

20101115 P 

436 

43 7 

SWA 

LDA 

CHSSIH 

CHACTBL,Xl+CHANNEL 


O 

...... ,.......... „,ot 

o . 

0 0 47 2 
00473 
00474 

* 0300*0 0 2 Z*.P. ......’ 

40000476 P 

20101135 P 

43 8 

43 5 

440 

A l U 9 E Q, 
STA 

LOA 

I Gnu Rt 

CHANEND 

CHERRTAB,Xl+CHANNEL 

IGNu Rh U ATA bhANNEL LRR 0 RS 

... ,o 


.0 047 5'“ 

00476 

“wzmnnnj..*. 

00000000 

.PI. 

442 

CHANEND 00 W 

. VJXZ . ~ .. ~ . 

IMPURE 

SKIP ' ONLY.IF UN'CCN'NECT. 

COMMAND TO 8 E EXECUTED PRIOR TO 
■ RE L E A-S-I-N G.--TH E.CM A N NI L-..... 


o o 

0 0 477 

0 050 0 

. 00501 

0 0 50 2 

0 0 503 

77550000 

53500000 
“0 0 70 0 51 i P 

03000533 P 

25200001 

44 4 
445 

““4*F6— 

447 

448 

CIA 

TAI 

— -——nw- 

AZJ,EQ 

LDAQ 

XI 

—G-erR-E'QSI 

CHNCTQEO 

CHCR,X 2 

GET CHANNEL NUMBER 

RESTORE IT TO INDEX ONE 

-GE~T—TH'E—NEXT QUEUED REQUEST*..—.. 

JUMP IF NO MORE REQUESTS 

MOVE CONNECT DATA OUT OF 

o 

........... o 


0 0 504 

0 0 50 5 

....0 0 50 6 . 

45 00 1100 P 

25200003 

...4.5-0-044-0.2.P.-........:.. 

EE 9 
450 

STAG' 

LDAQ 

........sr a n. 

CHGOEOE+CHCR 

RELEASE,X2 

.C HOU P UE +R PLEASE - - 

THE'TREE STORAGE BLOCK 


O . 

o .. 

00507 

00510 

.0 0511 

0 0 512 

25200005 

53700000 

41000 666 P .. 

0100 0 665 P 

... 

452 

45 3 

—w— 

45 5 
456 

LOAG 

TAI 

S i G 

UJP 

RTNADR,X2 

X3 

—C'ON ' 

ICON 

LOAD THE RETURN ADDRESS AND THE 

CONNECT COMMAND 

JUMP INTO THE CONNECT ROUTINE 

o 

. . ....... o 


.,. (1 Q.51 3. 

.n..i.Q..Q..n.n..n n. : . 

457 

45 8 
. 4 . 5 .JC,.... 

r pypcne T f t jp 

IMPURE 

..CCT . MCVT.OC|P|f.C..^T..T.K 1 .TUC.!. 


o 

0 0 514 

0 0 515 

20101105 P 

53600000 

460 

461 

LOA 

TAI 

CHQPTR,Xl+CHANNEL 

X2_ 

CHANNEL QUEUE. 

XI MUST CONTAIN THE CHANNEL NUM 8 E 

. o 

C) 

. 0 0 516 

00517 

0 0520 

3707/77/ X 

03 000 513 P 

20200003 

"~4*fr2~“ 

463 

4 64 

AZJ,£Q 

LOA 

3 IT17 

GETREGST 

.Q ,X2.._._. 

EXIT WITH A=0 IF NO RtGLtSlo 

X2 POINTS TO THE REQUEST BLOCK 

.....___ o 


0 0521 
00522 
... 0 052 3 

.T4777777... 

03 60 0 525 P 

...i_4.fin i.i 05. p .. 

. 4bs 

46 6 
4 . 5.7 

ENQ 

AQJ * GE 

f WA 

777776 
* 4*3 

..fiirIQPTK.-..... 

JUMP IF NOT THE LAST ELEMENT 


o 

0 0 524 
00525 

53140000 

40 10-1105 P 

r f. ft, , , , j. * .•. , v y , 

46 £ 
469 

AX A 

STA 

Xl+CHANNEL 

CHQPTR,Xl+CHANNEL 

GENERATE EMPTY QUEUE POINTER 

REMOVE FIRST ELEMENT 

o. 

Q 

u 0 p26 
00527 
00530 

5 £ £. U C s 0 0 0 

14300003 

00 777777 X 

4 t 1 
472 

TIA 
. ENI 

RIJ 

■ • X 2. 

■3, X 3 

FREEMEN. 

ofc. t 4UUKc.iL OF RcQuEo ! BLOCK 

INDICATE AN *3 WORD BLOCK 

FREE THE BLOCK 

.......... o 

1 ^ 

.00531. 

00532 

.53'2WIi¥iJ. : .. 

01000513 P 

. ~m r s~ . 

474 

. “ TIA 

UJ? 

—jcz ' ... 

GETREGST 

'SET.A.NGN-ZERO..... ...... .“ 

RETURN 


O'" . 

' V ' ' 

i CX . 



—— 

—— - —.— 


_______________——————---- —-—— 

o 

. ■ .......o 

! - , : . • _ “ • ‘ • . ‘ ' ‘ ’ 
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O 
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o 







o 







































ASSEMBLER/0S3 VI.0 09/21/74 2241 PAGE 10 


0 09 35 
0 0534 
00 535 
00536 
00537 
0 0 54 0 
00541 
0 0542 
00543 
00544 
0 0545.. 
00546 
00547 
0 0550 
0 0 551 
0 0 552 
00553 
0 0 554 
0 0 5i> 5 


'40101115 P 
00701066 P 

77520 000. 

77400377 
77300006 
■■0100 0 0"35~P" 
14 60 0 20 0 
44000543 P 

7740 0000. 

01000550 P 

12077776. 

03100542 P 
01000035 P 
13 700 026— 
53300000 
12000003 
'53140000 
44 00 G 0 05 
OlOOOOGl.P~ 


'‘0"Q*55'6''" 77 30*0 & 0 0 


476 

477 

47 8 

479 

480 

481 

482 

483 

484 . 

48 5 
48 6 

487 

488 
•48 9 

490 

491 

492 

493 
.4-94- 


495 

496 


0 0 557 
00560 

1760 00 01 
35101135 

P 

498 

499 

0 0 561 
00562 
.0.0563. 

40101135 
20101125 
.12.077 771. 

-p. 

P 

500 

501 

.....50-2.. 

0 0564 

0 0 565 
n n c a c 

176QQB70 

210000.05 


503 

504 

U U 5b 0 

0 0567 
00570 

1 /5UU1/0 
77300206 
03401060 

P 

.5 0 5. 

506 

50 ? 

0 0571 
00572 
..00-573 . 

7751137 i 
77300206 

.01 0-0 Q..2-44. 

x.-_— 

5 0 8 
509 

.. . g i 0 .. 

00574 

00575 

541,00005 
01000017 

p 

511 

512 


I NTS ORT 

CHNOTQEO ST A 
RTJ 

CHSSIM- 


3SI M 
INTS 
INS 

UJP. 

ENA 

SWA 

INTS 

UJP 

SHA- 

AZJ,N£ 

UJP 

sc aq- 

tia 

SHA 

.AIA. 

SWA 

UJP- 


■0HERROR' ■■■ Cl NS 
ANA 
SSA 

— .“5T7T. 

LOA 

-SHA. 

ANA 

LDQ 

— .—-ANQfS- 

INS 


AQJ t f 

XltF 

INS 

UJP 

LDI 

UJP 


C HACT 8L, Xl + CHA NNEL 
CLCA 

IMPURE—.-. 

3773,SENSE 
6 ,SENSE 
RETURN 
0 020 08 
*+l 

IMPURE,SENSE 

* +4 

* —4+ 

RETURN 

.2-2TX-3—r— 

X 3 
3 

Xl+CHANNEL 
000058 

...D-EGGDE--—. 


CLEARTHEACTIVITYWORD 


SET THE BIT IN THE MASK. 

SENSE FOR EXTERNAL INTERRUPTS 
FORGET IF CHANNEL BUSY 
SCRAM IF NO:-~rNTERRUP-T-S' 
EQUIPMENT 7 BIT 


CHECK FOR THE.INTERRUPT. 

THIS IS THE ONE 

CHECK -THE NEXT EQUIPMENT -NUMBER 

CHECK ALL EQUIPMENT NUMBERS 

THE MACHINE HAS BEEN KNOWN TO LIE 

CALCULATE THE EQUIPMENT NUMBER — 

PUT IT INTO THE A REGISTER 

SHIFT INTO POSITION 

COMBINEWITH THE CHANNELNUMBER 

JU MP. INTO . T HE-.I NT £R RU P T RGU TI N E . 


SEN s*E—————— 

1 

CHERRTAB,Xl+CHANNEL 
CHERRY 

C0NT8L,Xl+CHANNEL 

708 

1733 

0 2068, SENSE 
CHCLEAR 

.3-77-3. 

02063,SENSE 
CLOKIN 


LEAVE CHANNEL PARITY BIT 
SET ERROR B I TS I NT-0 TABLE 


00005B,Xl+CHANNEL 
INEINT 


SEE IF THIS DEVICE IS CONNECTED 

~£Q U-I-P-M E-NT.N U MEE R.TO.SEC ON D - DIGIT 

LEAVE EQUIPMENT NUMBER ALONE 
GET CURRENT INTERRUPT CODE 
LEAVE ONLY- INTERRUPT CODE 


JUMP IF THIS DEVICE HUNG 
“MAYBE SOMEONE FORGOT . 

-FAKE A.CLOCK.INTERRUPT-.-. 

RESTORE THE INTERRUPT CODE 


...—.-.-.-..51.2-+-0-0.2. * . ROUX.IN.E-X.O-.CALL . MOVE BUFF . SO . POOR . QW . PHANTOM . CAN . G-ET . IT GOING . 

00576 1430 G 0 35 P 512 + 004 I NT FAKE ENI RETURN,X3 RETURN ADDRESS 

00577 14100000 ■ • 512+0 15 -JMCM EM .I MPUREyX'l" .-. MACRO' ADDRESS.TO.DIDDLE.-. 

00600 01000000 512+006 UJP IMPURE ENTRY TO MOVESUFF TO GOTO 
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00601. 

0060 2 
0 0603 
0 0604 
U 0 6 0 5 
0 0 606 
0 0607 
00610 
0 0611 
0 0 612 
0 0 613 
0 0 614 
0 0615 
00616- 
00617 
00620 
0 0S2X 
0 0 622 
0 0 62 3 
0 0624 
00625 
0 0 62*6~ 
0 0 627 
00630 

00631. 

0 0 632 

00633. 

00634 
0 0635 
00636 
0 0 637 
00640 
0 0641 
00642 

00643. 

00644 
0 0 645 
0 0646 
0 0 64 7 
00650 


.77730000. 

22003047 

.53 50 0000. 

77540000 

14600001 

. 1210 0 00 0 

16610000 

44000611 

.7751G00U 

00700513 

.0 310 0 614 

20101115 

03000634 

--40XEX631" 

20101125 

14300062 


P 

.P. 

P 

P 

P 

P 


"WOTOW22.P 

77 00 0 000 

.0 270-0 622.Pi 

14700000 ' 

41101115 P 
14600200 - 

35101135 P 
41101135 P 

.oowfotto. 

77550000 

-53-50-0 0-0 0-. 

14300007 
47100644 P 
“47“3'0*0'6“4'5~“P" 
20100134 P 
53600000 

.rA'MTCW. P" 

04200022 p 
-0120 0 000 - - 
14100000 
14300000 
15 10 0 010 
02700635 P 
01 0 Q 0 0 35 P 


00611 3 


515 
-51-6. 

517 

518 

519 

521 

522 

523 

52 4. 

525 

526 

527 

528 

529 

530 

531 
-5-3-2- 

533 

534 

535 

53 6 
537 

53 6 
-54-0- 


541 

542 
-54-3- 

544 

545 


54 6 
54 7 

-5-4-8- 

54 9 

550 

551 

55 2 
553 

555 
-5-5-6- 
557 
55 8 

559 

560 

561 


INTSORT 

****** *********- 
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-A »n 1 ITTw e in ..pesmcm t nr. 1 qPERA i10N 0N A SINGLE DATA CHANNEL *~ 

OPERATIONS. * 

N RIGHT CHARACTER OF IOCL. * 

— -.-.-.—— - -————*- 

** ** ****** ******************************* V V- * V- »¥¥»¥¥»»»»*»¥»»¥» ¥«¥»¥»¥¥¥¥¥¥¥¥¥¥ 


ROUTINE T 
AND TO IN 
ASSUMES C 


0.PERFORMIOCL 

ITIATE RECOVERY 
HANNEL NUMBER It 


.O H IO C L. 


IOCL 


VFD 

LACH 

.TAX—- 

AC I 
ENA 

' SHA— 
XGA 
SWA 

.IOCL 

RTJ 

.AZUjNE 

LDA 

AZJ,EQ 

■ ST A. 

LOA 
ENI 


~$w& . 

CON 

-——XU-D— 

ENQ 

STQ 

-—.-. “E!tA~ 

SSA 

STQ 

CHioGLOs: vfq. 

CIA 
—TAX— 
ENI 
ST I 
ST I 
LOA 
TA-I 

~mr~ 

ISE 

UJP. 

ENI 
ENI 

-XNX— 
IJD 
UJP 


CHIOCLO' 
CHIOCLO 1 


CHIOCLO 

CHIOCLO 


A12/DINT 
IOCL+3 
XI -- 

1 

“flrxi—— 

10Q0QB 

IOCL 

IMPURE.. 

GETREQST 
-*-+l. 


C HACTBL , XI 
CHIOCL04 
' CHIOCLO 3— 
C ONT 8 L j XI 
50,X3 
. *+1 

IMPURE, 0 

*^1-,X3-- 

0 

CHACTBL,X1 
2 OOti 

C HERRTAB,XI 
CHERRTAB,XI 
A 247 IMPURE 


XI 

7 , X 3 

CHIOCL06,X1 
tHmetstrxf 
INSTL,XI 

Y 9 


I,, 

X2 

-*T3TXT .' 

X INERR,X2 

-Q-,-X2_ 

IMPURE,XI 
IHPURE,X3 
Tl**t8T*Xlr"——— 
GHIOCL05»X3 
RETURN 


PREVENTINTERFERENCE 

PLACE CHANNEL.NUMBER IN.INDEX 

PLACE INTO CHANNEL INDEX 


SHIFT BIT T0 FGSITI'ON-~ 

FOR IOCL COMMAND 

.ZAP ^ ' . ^. 

GET NEXT CHANNEL REQUEST 
LCOPUNTIL NOMGREREQUESTS 
LOAD ACTIVITY WORD 
JUMP IF NO ONE CONNECTED 
ST OR E-C CM P L ETIC N ~ COMM A NO- 
LOAD CONNECT CODE 


DOICE^ORTVERS.ASSUME. 

DEVICE CONNECTED 
---.MAYBE. 

ZERO OUT ACTIVITY TABLE 

ENTER IOCt-- 6 TT—- ; 

SET IN PREVIOUS ERRORS 


EXECUTE.CHANNEL.COMPLETION.OP 

FIND CHANNEL NUMBER 

BACK- . TO . INDEX --- - .-.-. 

EIGHT EQUIPMENTS 
SAVE THE INDEX 
SAVE'INDEX- ' 

LOAD TABLE WORD 


"ENTER.THE ' RETURN’ AU DRESS 


RESTORE INDEX 
RESTORE INDEX 
•NEXT CODE. 


o 


Cl. 


O 1 

o £ 

o £ 
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INTSORT 


....GO 651. 

0 C 6 51 
.77 63 0 0 Q 0. 

P 

0 0 652 
00653 

45001100 

20300002 

P 

Q . 

U U OP 4- 

0 0 655 

0 0 656 

ty 1 tl U U X X U L. 

47201103 
4 710 0 666 

r 

P 

P 

0 0657 
00660 

.. 0.0 6 6.1 . 

'5310 0 0 00" 
12077763 
..77540 0 G 0 . 


00662 

0 0 563 

53 50 0 Q 0 0 
20101115 

ns? a ri. fi , 7 n c. 

P 

Q , 

U UDO -f 

00 665 
00666 

UOIu u f UO 

14200002 
77 0000GO 

■ r . 

0 066 7 
00670 

.. 00671. 

02 600 666 
20001101 
4.01.0.11.45. 

.P. 

P 

...P. 

00672 

0 0 673 

20001102 
40101115 

a 1 +n,3. 

P 

P 

u 

11 u D / 4 

00675 

0 0 676 

O 4- £ U 11 U o 
20001100 
77634000 

r 

P 

.00677. 

00 70 0 

.. 00 701. 

"'X4 o0'0.0. 0 0. 

40101135 

_7X51.13Z.7_ 

p 

00 70 2 
00703 

20000666 

40101125 

p 

p 

u U rU4 

00705 

X f u f f fit 

013000Q4 



564 

565 

566 

567 

56 8 
569 

57 0 

571. 

57 2 
.573. 

574 

575 

576 

577 

578 
57 9 
530 

.584. 

582 

583 
"58*4- 
585 

587 . 

588 
569. 

590 

591 
*59*2** 

593 

594 


¥ 
¥ 
¥ 
¥ 

-¥~ 

¥ 
¥ 


¥'V ¥¥ * ¥'¥¥ ¥•¥ ¥* •*¥ ¥¥¥¥¥¥¥ ¥¥¥¥¥¥¥¥¥¥¥¥¥ ¥'•* * ¥¥¥¥*¥¥¥¥¥ 

.DEVICE ON.THE CHANNEL SPECIFIED BY * 


♦ 

¥ 

¥ 

* 

♦ 

"¥~ 

¥ 

¥ 

.* 

¥ 

_¥_ 

¥ 

¥ 

_¥•- 

¥ 


ROUTINETCCONNECT TO A 
THE CONNECT CODE. 

ENTER WITH THE CONNECT 
AMOUNT— 0 p.-- tt -H*E—T-H"A'T-T"HE* 
CALLING SEQUENCE IS AS 

(ENTER INFORMATION INTO 
ENI »X 3 

UJP.-. CONNECT-- 

XX xxxxx 


CODE IN INDEX ONE AND 

CHANNEL WILLBE .USED 

FOLLOWS - 

INDEX 1 AND C). 


U-jp- 1 -Ytm-~ 

(SOME . RANDOM INSTRUCTI O 


N) 


INSTRUCTION TC BE EXECUTED UPON 
PROCESSING OF THE CHANNEL INT 

“RETURNS HERE IF.THE CHANNEt IS 

BUSY WITH INDEX 2 RESTORED 
CONTROL IS RETURNED TO HERE 

WITHINDEX2RESTORED IF THE. 

CHANNEL WAS NOT INITIALLY BUSY 
.0R T HE RET URN ADDRESS IN INDEX * 

2 IF THE CALL WAS QUEUED * 

¥ 

-A—HiA’S • THE'' CONNECT 'CODE • IN IT AT *• 

EXIT * 

¥¥ ¥•¥ *¥¥¥ ¥¥¥¥;!>■->¥¥¥•*¥¥'«■¥¥¥'»¥¥¥¥¥¥¥-*,■¥*•*•¥*¥ ** * ¥ *¥*¥¥¥ ¥ **¥ 


THE MAXIMUM * 

IN 'THE G REGISTER * 

¥ 

¥ 

. . .*.¥ 

¥ 

_____»_ 

¥ 
¥ 

-¥~ 

¥ 
¥ 
¥ 
¥ 


w 

596 

.597... 

59 8 
599 

50 0 
601 
602 

‘W3. 

604 

...6.0.5..... 

60 6 
607 
6 08 

609 

610 
.641. 

51 ? 

51 . 3 '- 

614 

515 

-64-6- 

617 


EQU 

.CR-A. 

STAQ 
LDA 
■STA¬ 
SH 
ST I 

TIA. 

SHA 
-AC-I— 


CHCR+CHQUEUE 
2 X 3 

REtEASE+CHQUEUE 

INDEX2+CHQUEU£,X2 

CON»Xi 

.xi. 

-12 


ICON 

CCN 


TAI 

LDA 

***A*2Ui*NE* 

ENI 

CON 

.run 

LOA 

.ST A.. 

LDA 
ST A 
—LDI 
LDA 
ACR 

-ETTA.: 

STA 

_GILQ.. 

LDA 

STA 

-ANA 

UJP 


Xi+CHANNEL 
CHAGTBL,Xl+CHANNEL 

*e*HQI~T- ■ ■ 

2 ,X2 

IMPURE, 0 

..;. YZ .”.....“....*.—. 

chq&eue+maxtime 

.CHMA-XXI-M,. Xl+CHANNEL. 

CHQUEUE+RELEASE 
CHAGTBL,XIfCHANNEL 

C HQU E UE+TNDEX 2 , X*2. 

C HQUEUE+CHCR 


.SAVE.THE.CONDITION.REGISTER- 

LOAD THE COMPLETION COMMAND 
ANQ* SAVE THEM.”.... 

SAVE THE CONNECT CODE 

GET.C ON NECT.C C DE.'TO “A. 

CHANNEL NUMBER TO LOWER 
SET.CHANNEL.INDEX... 


CHECK 

QUEUE 


FOR 
-THE* 
ALLOW TWO 
CONNECT 


CHANNEL 
■C ALL-IP 
CONNECT 


ACTIVITY 

ALREAOY”ACTIVE 

REJECTS 


a - 

CHERRTAB,Xl+CHANNEL 

.3.Z7.B_ ; _ 


LOAD CHANNEL TIME LIMIT 

- ST O RE IT IN IHE TI ME IA BLE. 

PUT THE OTHER PARAMETERS INTO 
THE APPROPRIATE TABLES 

RESTORE INDEX TWO.—— 

LOAD THE CONDITION REGISTER 
RESTORE THE CONDITION REGISTER 


CON 

CON18L,Xi+CHANNEL 
7 7777 B— 

4, X3 


SAVE THE CONNECT CODE IN THE 
TABLE 

SO ME- ■*BR IVE'RS““D E P£ NB.O N.THIS*" 

RETURN 
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.'.■. : ..0 G 706.P.." 

.‘..619. 

. own. 

. ECU 

00 706 20 10 1125 P 

620 


LQA 


0 ’ 

-—.0 0 707. 

u o 7i o 
00711 

.36000666 

03000665 

47301104 

P. 

P 

P 


.621-:- 

622 

62 3 

---. SC A- 

AZJ,EQ 
STI 

CD . 

U 071 2 

0 0 713 

0 0714 

1430 UUUo 

0 0 77 7 777 
40 30 0 0 00 

X 


62 4 

625 

626 

EN I 

RTJ 

ST A 


0 0715 

0 0 716 

.. 0 0747. 

35000516 
40501105 
.2 5 00110-0. 

X 

P 


627 

628 

.62-9.-. 

SS A 

ST A j I 

..I n AO. 

O . 

00720 

00721 

n A 7 0 0 

45300001 
20 00 1102 

p 


630 

631 

ST AQ 
LOA 

Q 

0 0 re 2 
00723 

0 0724 

• 14/0 0 U 05 
45300003 
20001104 

r. 

P 


d o 2 

63 3 

634 

.ENQ. 

STAQ 

LDA 


0 0725 

0 0726 

.. 0 07?7. 

21 00 0 666 
45300005 

. 5..X7.-G.4-&.Q.Q. 

P 


635 

636 

.. 63-7 .. 

LDQ 

STAQ 

.. TAT .. 

O 

0 0 73 0 

0 0 731 

54201103 

01300003 

P 


63 8 

63 9 

*,**,«*■• /* , 4 *A v • - ■ • 

LOI 

UJP 

O .-. 





64 0 

541 

.642 _ _ 



0 0732 
... 0 0 733 

.G'073'2. 

77550000 
.53.5-u4-Q.-G-Q. 

~P“. 


643 Of* 

644 ' 

. .d-4-5... 

ic on equ 

' CIA 

... . tai_— 

O T 

00734 

00735 

20101105 

53700000 

P 


646 

64 7 

LDA 

TAI 

O . 

0 0 73 6 

0 0 737 

0 0 7 40 

37000/15 
03100742 
40101115 

P 

P 


649 

65.0 

AZJ j NE 
STA 


.00741. 

_. ,J0 7 42 . 

01 20 0 0 00 

.--5-3-2-0-0 0-0 G 



651 

652 

. -654 ... 

QJP 

J T A 

O . 

00743 

00744 

0 0 745 

40300004 

14200000 

-41400461 

P 


654 

655 

656 

. . . 1 X n . . 

STA . 
ENI 

.-.UJP — 




C ONTBLjXl+CHANNEL LOAD THE PREVIOUS CONNECT CODE 
CON...-SAME.UNIT-.TCC.-...-.--- 

ICON JUMP IF RECONNECTING 

RTNADR+CHQUEUE,X3 SAVE THE RETURN ADDRESS 

3?X3— — EIGHTWORDSARENEEDED 

GETMEM SO GET THEM 


0,X3 

POINT THE LAST ENTRY AT ITSELF 

BIT17. 

ADO THE INOIRECT BIT 


C HQPTR» Xl+CHANNEL LINK IN THE LAST REQUEST 

CHCR+ CHQ UEUE.—G ET CR A NO MAXTIME - 

C HCR j X3 

RELEASE+CHQUEUE 

RETURN -— - - ''~- * .... 

RELEASE,X3 
RTNADR+CHQUEUE 

C ON ' . 

RTNADR*X3 

-XT-------.:-- 

IN0£X2+CHQUEUE,X2 RESTORE INDEX 2 
3,X3 RETURN 


CHANNEL NUMBER TO THE A REGISTER 
Xl+CHANNEL-.—---------------- 

CHQPTR,Xl+CHANNEL 

X3 SAVE ADDRESS OF NEXT REQUEST 

^,-7 --- ———— 

*+3 JUMP IF A REQUEST 

CHACTBL,Xl+CHANNEL CLEAR ACTIVITY WORD 

t ijcr .".~.return . 

X2--RETURN.A0ORES-S—TO-.A..-.-.- 

INDEX2,X3 AND SAVE IT IN THE BLOCK 

0,X2 INDICATE DISCONNECT ONLY 

RLSCHANX' .. SIMULA! £ A.CHANNE L'“INTERRUPT. ... 
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INTSORT 


V Z Z V ^l- V- V X * ** »»»»» 


00753. 

00754 


UUOS 

0 0 756 
0 0 757 
0 0 760 
0 0 761 
u 0 7o 2 
00763 
00764 
00765 
00766 
0 0767 
00770 
00771 
00772 
00773 
00774 
0 077 5 
0 0 776 
0 07 77 
01000 
01001 
010 0 2 
01003 
010 0 4 
01005 
01006 


01007 
01010 - 
01011 
01012 
01013 
.01014 
01015 
01016 
01017 
0102 0 
01021 
01022 
0102 3 
01024 

0102’5 : 
01026 
01027 
0103 0 
01031 
010 32 

01033 
010 3 H 
01035 
01036 
01037 


10 0010 76.P- 

01077777 X 


"54377777 

05300001 

54700262. 

20377777 
17677777 
10 0 0' 10 77~ 
03 00 10 07 
21077777 
’ 5'3T3'0"0'3 5" 
47000755 

-24 30-076.0. 

17677777 


20377777.X 

0 3 60 Q 776 P 
13 00 0 030 

'"4T3W7FS.X" 

20300000 

...53-70-0-0 0 0._ 

02500767 P 
14477777 X 
-54 30 0775 ~X~ 
04300000 
00777777 X 
“iO'0‘0'1'0'77 "P"' 
01001005 P 

.oTooT.p~ 

53130035 
14377777 -X 
01001032 P 
14600001 
"3437 7777 X 
20300767 X 
17677777 X 
03001025 P 
2 0 30 0 2 63 X 
15477776 - 

40301017 X 
03101025 P 

‘14477777.X 

34301014 X 

...Q..1.Q.2..5.. 

24300772 X 
12077774 
34 3010 25 X- 
20300000 
53700000 
02501012. P 

143 77 777.X 

20377777 X 
03 00 1041 P 
53600000 
14600001 


ROUTINE-.FOR.CHANNEL.OVERTIME CHECKING. . 

TIHEHOUR MUST COUNT DOWN THE ENTRIES IN C.HMAXTIM EVERY HOUR 
WHEN IT ACJU8TS THE REAL TIME CLGCK. 

THISROUTINE SIMULATES ACHANNEL INTERRUPTIFA DEVICE 
HOLDS A CHANNEL LONGER THAN THE TIME IT REGUESTEO WHEN 
IT CALLED THE CONNECT ROUTINE 


* -V- + W* V -? * -7- ■¥ ■»•¥■¥ 


00746 

47377777 

X 

662 

670 

CHCHECK STI 

C HCH KRTN,X3 

0 0 7 i + / 
00750 

14601750 

14700746 

P 

671 

672 

c.N A 

ENQ 

100 0 

CHCHECK 

0 0 751 

00 777777 

X 

673 

RTJ 

TIMSET 

0 0 752 

14300755 

P 

....674.. 

67 5 

ENI 

* +3,X3 




SAVE THE RETURN ADDRESS 


CHECK EVERY SECOND 

CALL HERE ON END OF INTERVAL 

CALL TIME SETTING ROUTINE 


ttJ 0-0-2- 


UND04 


UND06 


WCOi 


720+001 

"72 3.:. 


JiC.0..2-. 


WCQ"3" 


MSFC02 


DISKFLAG 

DKCLK 


ENTER THE RETURN 

SH0UL,0-WE CHECK FOR HUNG UP 

DISK UNITS 


•THIS ~G ODE*-REMOVES““D£|_-A*Y“eY~-CH0OSING“A DELAYED USER 
AND CLEARING THE DELAY BIT. 


TOT 

ISG 

.LQX*-X. 

IDA 

ANA 

-SSH . 

A2J,EQ 

LOQ 

.THT.“ 

STI 

.LDA. 

ANA 

AZJ»EQ 

LOA 

AQJ,G£ 

SHAQ 

"STI.. 

LDA 

. I-A-I .. 

IJD 

ENA»S 

lOI 

ISE 

RTJ 

SSH 

UJP 

TOU 

TMI 

HE NI . 

UJP 

ENA 

"RAO 

LDA 

.AMA-,- 

AZJ,EQ 
LOA 
I N A j S 
ST A 

AZJ,NE 

~EN"ATS 

RAO 


ENI_ 

LDA 

AZJ,EQ 

-f-A-i— 

ENA 


"FRT'YRSA, 
1 ,X3 + PSA 
RPSAPTR, 
IOBOUNO, 
NK 8 ITS 
“UNOCTR— 
UNO 06 
BIT22 

HTJ7XI.. 

PRTYPSA, 
IOBOUNOj 
DELAY 
UNO 0 4 
"PAGE'R'EQy 
UNDO 4 
24 . 

.PRTYPSA, 

0 ,X3+PSA 

-X3+P--SA. 

U NDO 2,XI 
NDEL A Y 
-pRTYPSAy 
0 , X3+PSA 
IOCLEAR 

“UTOCTR". 

* - * 


X3+P'SA" 

X3+PSA. 

X3+PSA 


X3+PSA 


X-3+P'SA- 


X3+PSA" 


X3 + PSA 


1 

WCG3 

i 


XI 

h , X 3 


WCTIME,X3 ..’ 

I080UNO»X3+FSA 
-X-XHE-W-AI-T-..-. 

WC02 

A ,X3 + PSA 

-1 

A,X3+PSA 
WC 02 

"NTTWWATT...—.""""" 

I03GUND,X3+PSA 

* 

"PAGFREQ» X3 + PSA 

-3 

P AGEREQ,X3+PS A 
0 ,X3 
X 3 

WC01, XI-~ 

-M.SUNX.XM.lj.X.3--^ _ 

MSF8LK,X3 
MSFC04 

1 


USER 


GET CURRENT BACKGROUND "USER""" 
SKIP IF ONE EXISTS 

-USE.RANDOM.USER.—.-... 

GET I060UND BITS 

LOOK FOR TERMINAL WAIT 

SKIP IF TIME TO CHANGE PRTYPSA 

JUMP IF USER COMPUTING 

LARGE FOSITIVE NUMBER 

NU M3ER.OF.USERS.T'0""X1. 

FORGET LAST BACKGROUND USER 

GET.USERS.IG8CUN0---. 

CHECK FOR DELAY 
JUMP IF NOT DELAYED 

'GET BADNESS CCFFICIENT... 

JUMP IF A NASTIER USER 
REMEMBER HOW BAD THIS USER IS 

.NOMINATE.FOR.BACKGROUND.USER".. 

EXAMINE NEXT USER 

'JUMP IF MORE.USERS...“ 

ALL BITS EXCEPT DELAY 

GET PRIORITY USER/S PSA . 

SKIP IF NOT A USER 
CLEAR DELAY BIT 

"THIS CODE RESETS UNDCTR .. 

INEFICIENTLY 


CHECK 


DELAY REQUEST 


JUMP IF NOT DELAYED 
SEE HOW MUCH TIME IS LEFT 
COUNT DOWN 3Y ONE SECOND 
PUT IT BACK FOR NEXT TIME 
JUMP IF NOT FINISHED WITH WAIT 

"GET.THE "M ASK" TO.CLEAR.fiTM.. 

CLEAR TIMEWAIT BIT 


DIVIDE BY 6 
REDUCE- PAGEREG.EY 


-CHA R G £. USER .DISK.PACKS FOR... 

WALL CLOCK TIME 
JUMP IF NOT OK LINE 
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I NT SORT 



"01040. 

010 41 

3420 0 005 
02701034' 

P 


73 8 

739 

...7.4(1... 

MSFC04 

RAD 

IJD 

® ' 

01042 

01043 

1410 00 07 

2 0 101115 

P 


741 

742 

CHCMAL 

ENI 

LD A 

O . 

U13 44 
01045 
01046 

03 001 0 51' 
20101145 
03301053 

P 

P 

P 


.74 3".. 

744 

745 


AZ J,Ed 
LD A 

AZ J , LT 


.010 47 

0105 Q 

... f |1 fUj-l 

.15476027 

40101145 
_.0 ? 5 0 1 0 4 3 

P 

.D. 


..746.. 

74 7 

...... 74 a... 

.:.ruKjn a r. 

IN A, S 
ST A 

.Tin.. 

O 

01052 

01077777 

X 


74 5 

75 0 


UJP 

o. 

01053 

010 5 3 
14 60 0 4 00 

p 


.751 

752 

753 

CHWOT 

EQU 

ENA 


oia54 . 

01055 

... 1 i 4 . 4 i .56 . 

".35T0TTT5~ 

40101135 

.GitM.nfln. 

p. 

p 


75 k 

755 

... 7 e a ._ 


.SSA. 

ST A 

TT A _ 

o — 

.UiUvu 

01057 
0106 Q 

n a n r a 

o. u u y w y 

77540000 

77300000 



75 7 

75 8 

CHC LEAR 

i X M . 

ACI 

GINS 

o _ 

01 Obi 
01062 
01063 

1/OU0007 

35101135 

40101135 

p 

p 


-r5 9 

76 0' 

761 


ANA 

SSA 

STA 


01064. 

01065 

.00701066 

01000460 

.p." 

p 


7 to 2 

763 

—.—-7-6-4-- 

765 

766 

76 8 

769 


~KTJ“ . 

UJP. 

o o 

01066 
' ' 01067 

0107 0 
01071 

01000000 
* 14 60 0 Q 01 
12100000 
16612000 


———— 

CL.CA 

UJP 

“EtTA— 

SNA 

XOA 

/■**•% *...* 

. 010 72 

01073 
.01074. 

.4TOT07T 

77512000 
.0100-1466- 

~F . 

-R— 


774 

17 1 

. 77-2-- 


“"SRI 

CLC A 

-UJ-P--- 


o 


o 


o 


o 

Q 


a 


o £ 

o £ 

o 6 

o K 




o 


3LKR > X2+CN8LK 
MSFG02jX3 


7 jXl + CHANNEL CHECK ALL EIGHT CHANNELS 

CHACT8L,Xl+CHANNEL LOAD THE CHANNEL ACTIVITY WORD 

CHNOAC.. ..— JUMF.IF.NO DRIVER IS CONNECTED 

CHMAXTIMjXl+CHANNEL LOAD THE TIME LIMIT 
CHWOT JUMF IF CHANNEL IS HUNG UP 

-1000. . DECREMENT.THE.TIME.LIMIT. 

CHHAXTIM,Xl+CHANNEL AND STORE IT BACK 
C HCMAL, Xl+CH ANNEL LOOP UN TIL D0NE-- 


C REAT BAT 


CD 
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